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SEQ 0ii2 



1. ABSTRACT 



THE PDP-11 POWER FAIL DIAGNOSTIC CONSIST CF TWO PARTS, G»E OF 
WHICH IS A EXERCISER TEST WHICH CHECK ALL FACETS OF POWER FAIL. 
(REF SEC. 5.2) OPERATOR INTERVENTION IS REQUIRED. 

PART TWO IS MADE UP OF SEVERAL SMALL TESTS WHICH ENABLE THE USER 
TO TROUBLE- SHOOT THE POWER FAIL MODULE WITH SMALL BASIC ROUTINES* 
(REF. SEC. 5.2) 

2. REQUIREMENTS 



2.1 EQUIPMENT 



PDP-11 

(MACHINE MAY HAVE UP TO 28K OF MEMORY) 



2.2 STORAGE 



2.2.1 THE MAIN BODY OF THE PROGRAM OCCUPIES FROM LOCATION TO 4750 

2.2.2 THE POWER FAIL EXERCISER USES ALL OF MEMORY UP TO THE LOADERS, 
FOR A MEMORY VOLATILITY TEST 



3. LOADING PROCEDURE 
3.1 METHOD 

PROCEDURE FOR NORMAL ABSOLUTE TAPES SHOULD BE FOLLOWED. 

4. STARTING PROCEDURE 



****NOTE**** WHEN RUNNING THIS DIAGNOSTIC THE TERMINAL SHOULD BE POWERED 
FROM AN UNSWITCHED POWER OUTLET (NOT CONTROLLED BY PROCESSOR ON/OFF SWITCH). 
POWER FAIL TYPE OUT MESSAGE HAY NOT BE TYPED IF TERMINAL IS NOT POWERED BY 
AN UNSWITCHED POWER OUTLET. 

4.1 SWITCH SETTING 



WHEW THE EXERCISER TEST OR A DIAGNOSTIC TEST IS 
STARTED, THE PROGRAM WILL DETERMINE IF THF PROCESSOR 
HAS A HARDWARE SWITCH REGISTER (SWR). IF THERE 
IS NO HARDWARE SWR # THE PROGRAM WILL USE THE SOFTWARE 
SWR LOCATED AT ADDRESS 176« THE OPERATOR SHOULD SET 
UP LOC 176 BEFORE STARTING THE PROGRAM WITH THE 
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105 APPROPRIATE VALUE* 

106 

107 SWITCH FUNCTION 

108 

109 15 SET-HALT AT END CF TEST PASS 

110 CLE ARED-LQCP CN TES*? 
111 

112 14 SET-CIS ABLE TTY FPINTING 

113 CLE ARED-ENABLE TTY POINTING 
114 

115 NOTEll THE EXERCISER AND DIAGNOSTIC ^ESTS SULL ALteAYS 

116 HALT ON ERROR* 
117 

118 N0TE2 1 SINCE THE HARDWARE Sfe^ MAY * E CLEARED OK PCHER- 

119 UP, THE PROGRAM DOES HOT REFERENCE ^HE HARDWARE S^R 

120 DURING LOOP ON TEST. IHEFEFCRE, TO CHANGE THE SWITCH 

121 SETTINGS USING THE HARDWARE SWR THE OPERATOR MUST RE- 

122 START A TEST* 
123 

124 THE OPERATOR MAY CHANGE THE SWITCH SETTINGS FROM THE 

125 TTY- AFTER STARTING A TEST, THE PROGRAM MILL OUTPUT 

126 AT THE TTY (IF SR14 IS CLEARED) THE FOLLOWING MESSAGE 
127 

128 S¥R=XXXXXX 
129 

130 NEi SMR= 

131 

132 THE OPERATOR MAY THEN ENTER UP TC SIX OCTAL DIGITS. 

133 ENTERING MORE THAW SIX DIGITS OR A CHARACTER OTHER 

134 THAN A DIGIT RESULTS IN A REPEA T OF THE PROMPTING 

135 MESSAGE* CARRIAGE RETURN ENTERS THE UPDATED VALUE. 

136 IF NO DIGITS HAVE BEEN ENTERED, THE SWITCH REGISTER 

137 VALUE REMAINS UNCHANGED • 
138 

139 THE OPERATOR MAY INTERRUPT THE EXERCISER TEST TO CHANGE 

140 THE SWITCH SETTINGS BY TYPING CONTROL-G AT THE TTY» 

141 THE PROGRAM WILL GUTPUUT AT THE TTY THE FCLLCyiWC 

142 MESSAGE 

143 

144 SUR=XXXXXX 
145 

146 NEM SUR- 

147 

148 THE OPERATOR MAY THEN RESPOND AS DESCRIBED IN THE 

149 PRECEDING PARAGRAPH* 
150 

151 NOTE3I THE PROGRAM li ILL RESPOND TO CONTROL-G ONLY 

152 DURING THE EXERCISER TEST, NOT DURING THE DIAGNOSTIC 

153 TESTS* 
154 

155 4*2 STARTING ADDRESS OR ADDRESSES 

156 

157 

158 BEFORE STARTING THE OPERATOR SHOULD REFERENCE THE PROGRAM LISTING 

159 FOR OPERATOR INSTRUCTIONS FOR EACH T£ST« 
160 
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161 4.2.1 EXERCISER TEST 

162 

163 

164 THE STARTING ADDRESS OF THE POiFRFAIL EXERCISER IS LOC»20i« 

165 THE EXERCISER TEST IS CALLED TEST 5„ 
166 

167 4»2*2 DIAGMOSTIC TESTS 

168 

169 

170 LOC» 204 IS THE STARTING ADDRESS FOR TESTISG THE POIER FAIL TRAP CAPABILITY 
171 

172 LOC» 210 IS THE STARTING ADDRESS FOR TESTING POIER FAIL SE-ST1RT CAPABILITY (USI 
173 

174 LOC* 214 IS THE STARTING ADDRESS FOR TESTING POIER FAIL RE-START CAPABILITY C 
175 

176 LOC« 220 IS THE STARTING ADDRESS FOR TESTING POWER FAIL RE-START CAPABILITY CUSI 
177 

178 LOC 224 IS THE STARTI1G ADDRESS FOR TESTING 2WILLI SEC» SBUT DOKN CAPABILITY OF 
179 

180 LOC. 230 IS THE STARTING ADDRESS FOR TESTING 2 WILLI S£C» UP 1IWE OF POWER FAIL. 
181 

182 THESE SIX TESTS ARE REFERRED TO AS TESTl^ TEST2# ALTEST # 

183 ALTST1 # TEST3 # AND TEST4 RESPECTIVELY. 
184 

185 4.3 PROGRAH AND /OR OPERATOR ACTION 

1 86 -_„—- . 

187 

188 THE PROGRAM TITLE IS PRINTED EACH TIME THE EXER- 

189 CISER TEST IS STARTED. k¥ END-OF-P1SS STATEMENT 

190 IS PRINTED AT THE EMD OF FACH TEST LOOP. A POWER Flit 

191 MESSAGE IS PRINTED AFTER THE POIER OFF-Oi SEQUENCE OF 

192 THE EXERCISER TEST. 
193 

194 THE OPERATOR HAS I LARGE PART IN THIS TEST* IT IS HIS RESPONSI- 

195 ABILITY TO GENERATE A POMER FAIL CONDITION 

196 TO CAUSE A VALID POIER FAILURE ON A SISTER REMOVE THE AC 

197 FROW THE POIER COWfRQL PANEL BY EITHER TRIPPING THE AC 

198 BREAKER OH THE POIER BUS FOX # OR B¥ PULLIIG THE MALL PLUG# 

199 WHICHEVER IS APPROPRIATE. IN HOUSE,, A POMER INTERRUPTER 

200 MAY ALSO BE USED. 
201 

202 NOTE1 * INTERRUPTING POiER BY USING THE FRONT PAWEL KEY OR 

203 THE BREAKER SWITCH 01 A POiEfi SUPPLY IS NOT VALID** THIS 

204 METHOD DEFEATS THE ACTION OF THE LIFE FILLER OF THE POWER 

205 CONTROL AID THUS CAH ALLOW NOISE FROH SV ITCHING TRANSIENTS 

206 TO ENTER THE SYSTEM. 

207 REFER TO P*A»S»T„ FOR MORE INFORMATION ON POMER 

208 FAIL PROCEDURES. 
209 

210 N0TF2 2 DO NOT INTERRUPT THE POIER DURING TITLE 

211 PRINT-OUT^ HHILE CHANGING THE S1ITCH SETTINGS FROM 

212 THE TTY # OR DURING THE END-OF-PASS PRIIT-OUT OF A DIAG- 

213 NOSTIC TEST* THE POiER MAY BE INTERRUPTED DURING THE 

214 EMD-OF-PASS PRINT-OUT OF THE EXERCISER TEST* 
215 

216 N0TE3I IF THE POMER IS INTERRUPTED DURING THE END- 
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217 OF PASS PRINT-OUT OF THE EXERCISER TEST/ THE POKER FAIL 

218 AND POWER RESTORE ROUTINES WILL BRANCH ARCUND THE 

219 CODE THAT NORMALLY CHECKS THE S* ACK FCR A PROPER VALUE. . 

220 THE POWER FAIL AND POSER RESTORE ROUTINES WILL ALWAYS BE 

221 FULLY EXECUTED WHFN TTY PRINTING IS DISABLED (SR14 SET)* 
222 

223 

224 5. ROUTINE ABSTRACTS 

225 

226 

227 5,1 MASTER EXERCISER TEST 

228 

229 

230 THIS ROUTINE INCORPORATES A MEMORY VOLATILITY TEST WHILE WAITING 

231 FOR A POWER FAILURE, THE ROUTINE FIRST DETERMINES THE AMOUNT OF 

232 MEMORY ON THE SYSTEM AND THEN FILLS THAT MEMORY WITH A 152525 

233 PATTERN. T X HE ROUTINE THEN CHECKS MEMORY FOR THE CORRECT DATA/ 

234 IF A POWER FAILURE OCCURS THE ROUTINE WILL STORE ALL OF THE 

235 ACTIVE REGISTERS AND WAIT FOR 2 MILLISECONDS AND HALT- TEE 

236 ROUTINE ON RESTART RESTORES THE ACTIVE REGISTERS AND WAITS TO 

237 SEE THAT NO OTHER POWER FAILURE OCCURS WITHIN A 2 MILLISECOND 

238 PERIOD, WHEN THE ROUTINE EXITS FROM THE RESTORE IT GOES FACK 

239 TO CHECKING MEMORY, 
240 

241 5.2 DIAGNOSTIC SUBROUTINE ABSTRACTS 

242 

243 

244 POWER FAIL TRAP CAPABILITY 

245 

246 

247 IN THIS TEST THE ABILITY OF THE POWER FAIL TO TRAP TO 

248 LOCATION 24 ON POWER DOWN AND POWER UP IS TESTED THE STACK IS 

249 CHECKED FOR THE CORRECT VALUE AND THE STACK POINTER IS TESTED 

250 FOR THE CORRECT CONTENTS. 
251 

252 A HALT OCCURS WHEN POWER IS RESTORED/ THE OPERATOR MUST DEPRESS 

253 CONTINUE TO COMPLETE TEST. 
254 

255 POWER FAIL RE-START CAPABILITY (WAIT) 

256 

257 

258 IN THIS ROUTINE THE ABILITY OF THE POWER FAIL TO TRAP 

259 AND STORE ACTIVE REGISTERS AND RESTART CORRECTLY USING 

260 A WAIT INSTRUCTION TO WAIT FCR POWER FAILURE IS TESTED 

261 HERE 
262 

263 POWER FAIL RE-START CAPABILITY (BR.) 

264 

265 

266 IN THIS ROUTINE THE ABILITY OF THE POWER FAIL TO TRAP 

267 AND STORE ACTIVE REGISTERS, AND RESTART CORRECTLY USING 

268 A BR, TO WAIT FOR POWER FAILURE IS TESTED HERE. 

269 

270 POWER FAIL RE-START CAPABILITY (EMT) 

271 ■ 

272 
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IN THIS ROUTIWE THE ABILITY CF THE POWER FAIL TO TRAP AND 
STORE ACTIVE REGISTERS*, AUD RESTART CORRECTLY USING A EM TO 
WAIT FOR THE POWER FAILURE IS TESTED HERE 

TEST 2 MILLISECONDS DOWN TIME 



IN THIS TEST THE AMOUNT OF TI^E THE PROCESSOR HAS TO STORE THE 
ACTIVE REGISTERS IS CHECKED THIS TIME SHOULD EQUAL 2 MILLISECONDS 
BEFORE ALL PROCESSOR ACTION MUST BE STOPPED. 

TEST 2 MILLISECONDS UP TIME 



IN THIS TEST THE POWER FAIL LOCK OUT OF 2 MILLISECONDS DURING 
RE-START IS CHECKED. DURING RESTORE FOR 2 MILLISECONDS THE 
PROCESSOR MILL HOT ALLOW A POWER FAIL TRAP TO OCCUR 



6. ERROR 



6.1 ERROR HALTS AND DESCRIPTION 



REFER TO LISTING FOR ALL HALTS AND DESCRIPTIONS 
6.2 ERROR RECOVERY 



IN THE EXERCISER MEMORY VOLATILITY TEST THERE ARE TWO RECOVER- 
ABLE HALTS. 

HALT NQ.l. DATA LIGHTS CONTAIN BAD MEMORY LOCATION (DEPRESS 

CONTINUE TO TEST SEE DATA) 

HALT N0.2. DATA LIGHTS CONTAIN DATA OF BAD MEMORY LOCATION 

(DEPRESS CONTINUE TO TEST NEXT WORD) 

7. RESTRICTIONS 



NONE 

8. MISCELLANEOUS 



8.1 EXECUTION TIME 



EACH EXERCISER PASS TAKES APPROXIMATELY 5 SECONDS- 
8.2 ACT11 OPERATION 



THIS PROGRAM WILL RUN UNDER ACT11. 

**NOTE: IN QUICK VERIFY MODE THE PROGRAM WILL RUN 
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329 








BUT DOES HOT CHECK ANY OF THE POWERFUL CIRCUITRY 




330 








BECAUSE ACT HILL NOT POWER FAIL DURING CV. 




331 












332 












333 






% 






334 












335 












336 






;PDP-ll 


POWER FAIL TEST 




337 






;THIS PROGRAM CONSIST OF SEVERAL TEST THAT INSURE THAT 




338 






?P0WER 


FAIL IS OPERATING CORRFCTLY. 




339 






} 






3 40 












341 












342 






;***PRCGRAM SUPPORTS SOFTWARE SWITCH REGISTER CLCC 1763*** 




343 












344 












345 






"r 






346 






;P0WER 


FAIL TRAPS TO LOCATION 24 




347 






/ 






348 






/ 






349 












350 






/ 






351 






/ 






352 








. ABS 








aaaaaa 

V VV XJttWJ 




.=0 








aaaaaa 
v W H WO 




-REPT 5 












-♦2 












HALT ;P0WEP FAIL TRAPPFD TO WRONG 


LOCATION 










• ENDR 




I^R 


aaaan/i 
bovv m 


aaaaaa 


PFHAND: 


; ADDRESS OF POWER FAIL HANDLER 


IRQ 








;STATUS 








a aaai"i 




-REPT 72 




Tfc 1 








.+2 




362 








HALT ;PCWER FAIL TRAPPED TO WRONG 


LOCATION 


363 








.ENDR 
















365 












366 












^67 












369 












369 






;400 TO 


1000 IN MEMORY IS ASSIGNED TO THE STACK 




370 












371 












372 












373 












374 












375 












376 












377 




000046 




. = 46 




378 


000046 


003102 




LOGICAL 




379 




000052 




.=52 




380 


000052 


140000 




140000 




381 




000176 




-=176 




382 


000176 


000000 


SWREG: 


; SOFTWARE SWITCH REGISTER 




383 




000200 




.=200 




384 


000200 


000167 0P2272 


MASTER : 


JMP TEST5 ; COMPLETE TEST OF POWER FAIL 





QRC 27 


-OCT-77 


08:52 








000204 


000167 


000570 


STARTl: JMP 


TEST1 


;ENTER TEST 1 (TEST TRAP CAPABILITY) 


000210 


000167 


000676 


START2: JMP 


TEST2 


;ENTER TEST2 (TEST RE-STAFT CAPABILITY) 


000214 


000167 


001166 


STR2A: JMP 


ALTEST 


;TEST RE-START USING BR. INSTRUCTION 


000220 


000167 


001342 


STR2B: JMP 


ALTST1 


>TEST RE-START USING EMT INSTRUCTION 


000224 


000167 


001606 


START3: JMP 


TEST3 


;ENTER TEST3 (TEST FOR 2 MILLISECONDS TIFF) 


00023B 


000167 


002014 


START4 : JMP 


TEST4 


/ENTER TEST4 (TEST FOR TWO MILLISECONDS) UP 




000006 




SP=%6 




;STACK 




000000 




LIGHTS=%0 




/DATA LIGHTS 




177776 




STATUS=177776 




;LOCATION OF STATUS REGISTER 




000007 




PC=%7 




;LOCATION OF PC 




000030 




EMTRP=30 




/FMULATOR TRAP LOCATION 




000234 




SWRG=. 






000234 


177570 




.WOPD 


177570 






001000 




.=1000 
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385 
386 
387 
388 
389 
390 
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393 
394 
395 
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400 
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407 
408 
409 
410 
411 
412 
413 
414 
415 
416 
417 
418 
419 
420 
421 
422 
423 
424 
425 
426 
427 
428 
429 
430 
431 
432 
433 
434 
435 
436 
437 
43B 
439 
440 



;BASIC POWER FAIL TEST 



;TEST1 IS A ROUTINE USED TO THE POWER FAIL'S ABILITY 
;TO TRAP TO LOCATION 24. 



; OPERATOR INSTRUCTIONS 



001000 


012706 


001000 




TFSTl: 


MOV 


#1000, SP 


;SET UP STACK 


001004 


004767 


002620 






JSR 


PC, SETSWR 


;SET UP SWR POINTER 


001010 


004767 


002736 






JSR 


PC, UPDATE 


;UPDATE SWR 


001014 


012706 


001000 




LPTSTl: 


MOV 


#1000, SP 


;SET UP STACK 


001020 


012767 


001036 


176776 




MOV 


#TEST1 H, PFHAND 


;SET UP POINTER 


001026 


052767 


000357 


1767 42 




BIS 


#357, STATUS 


;SET STATUS BITS 


001034 


000001 








WAIT 




;WAIT FOR POWER FAIL OPERATOR SHOULD TURN OFF HERE 


001036 


000000 






TEST1H: 


HALT 




;POWER FAIL HALTS HERE ON WAY DOW* 










; 

?TEST1 


CHECK - 


CHECK IF STACK 


MAS DECREMENTED AND 










JSTATUS 


WAS SET 


UP. 




001040 


026727 


177730 


001036 


TEST1CH 




CMP 774,#TEST1H ;CHECK PC AND SP (LOCATICS) 


001046 


001401 








BEQ 


.+4 


; ARE THEY EQUAL 


001050 


000000 






HALTl: 


HALT 




/ERRCR 1 PROCESSOR FAILED TO TRAP 
















^LOCATION 774 SHOULD CONTAIN #TEST1H IN STACK 


001052 


026727 


177720 


000357 




CMP 


776, #357 


;WAS THE STATUS STORED CORRECTLY 


001060 


001401 








BEQ 


. + 4 


;TEST 


001062 


000000 






HALT2: 


HALT 




;ERRCR THE STATUS BEFORE THE TRAP HAS NOT STCRED 


001064 


012700 


000210 






MOV 


# ST ART2, LIGHTS 


;SET UP LIGHTS WITH ADDRESS 


001070 


012706 


001000 






MOV 


#1000, SP 


;SET UP STACK 


001074 


004767 


002604 






JSR 


PC, PRINT 


;END-OF-PASS MSG 


001100 


004470 








MSG3 






001102 


005767 


177070 






TST 


SWREG 


;LOOP ON TEST? 


001106 


002342 








BGE 


LPTSTl 


?YES 


001110 


000000 








HALT 




;NQRMAL HALT NO ERRORS 



001112 012706 001000 



/TEST ROUTINE TO CHECK RE-START CAPABILITY 
;USING THE WAIT INSTRUCTION 

; OPERATOR MUST SET HALT SWITCH TO ENABLE POSITION 



;SET UP STACK 



UN. 


MACY11 


30(1046) 


01-HOf 


-77 14:00 PAGE 


9 






CAQG.QRC 27-0CT-77 


08:52 












441 


001116 


004767 


002506 






JSR 


PC/ SETSWP 


;SET UP SWR POINTER 


442 


001122 


004767 


002624 






JSR 


PC, UPDATE 


jUPDATE SWR 


443 


001126 


012767 


000357 


176642 


LPTST2: 


MOV 


#357/STATUS 


;SET UP CONDITION CODES 


444 


001134 


012767 


000005 


176664 




MOV 


#5,PFHAND«-2 


;SET UP POWER FAIL CODES 


445 


001142 


012767 


001212 


176654 




MOV 


#TEST2A/PFH AND 


;SET UP POINTER TC STORE ROUTINE 


446 


001150 


012706 


001000 






MOV 


#1003, SP 


;SP UP STACK POINTER 


447 


001154 


012700 


152525 






MOV 


#152525/%0 


;SET UP FAST MEMORY 


448 


001160 


010001 








MOV 


%0,U 




449 


001162 


010102 








MOV 


%l/%2 




450 


001164 


010203 








MOV 


%2/%3 




451 


001166 


010304 








MOV 


%3/*4 




452 


001170 


010405 








MOV 


%4/%5 




453 


001172 


000001 








WAIT 




;WAIT FOR POSsER FAIL trap 


454 


001174 


004767 


002504 






JSR 


PC/ PRINT 


;END-OF-PASS MSP 


455 


001200 


004516 








MSG4 






456 


001202 


005767 


176770 






TST 


SWREG 


;LOOP ON TEST? 


457 


001206 


002347 








BGE 


LPTST2 


iYES 


458 


001210 


000000 








HALT 




;FQRMAL TEST HALT NC ERRORS 


459 










/OPERATOR MUST 


TURN POWFR OFF HFRF 


460 










jROUTINE TO STORE ACTIVE REG. 




461 


001212 


022706 


000774 




TEST2A: 


CMP 


#77 4,SP 


;IS S^acK CORRECT 


462 


001216 


001406 








BEG 


TEST2F 




463 


001220 


010667 


002342 






MOV 


SP/SAVE 


;CQNIENTS OF STACK SAVED- 


464 


001224 


012767 


001232 


176572 




MOV 


#HALT3E,PFHAND 


;STACK CONTAINS 1*RCNG ADDP 


465 


001232 


000000 






HALT3E : 


HALT 






466 


001234 


010046 






TEST2B: 


MOV 


%0/-(SP) 


;STORE REG 9, 


467 


001236 


010146 








MOV 


%1/-(SP) 


;STORE PEG 1 


468 


001240 


010246 








MOV 


%2,-(SP) 


; STORE PEG 2 


469 


001242 


010346 








MOV 


%3/-(SP) 


;STORE "EG 1 


470 


001244 


010446 








MOV 


%4,-(SP) 


;STORE PEG 4 


471 


001246 


010546 








MOV 


%5/-(SP) 


JSTCRE REG RE STACK 


472 


001250 


022706 


000760 






CMP 


#760/SP 


;TS STACK CORRECT 


473 


001254 


001404 








BEG 


TEST2D 




474 


001256 


012767 


001264 


176540 




MOV 


#HALT4E,PFHAND 


? T HE STACK TS KPCNG 


475 


001264 


000000 






HALT4E: 


HALT 




;WAIT FOR RESTART 


476 


001266 


012767 


001310 


176530 


TEST2D: 


MOV 


#TEST2CH,PFHAND 


;SET UP NEW PCINTFR 


477 


001274 


012767 


000005 


176524 




MOV 


#5/PFHAND+2 




478 


001302 


010667 


002260 






MOV 


SP/SAVE 




479 


001306 


000000 








HALT 




; ALL ACTIVE REG. STORED. WAIT FCfi 



481 
482 
483 
484 
485 
486 
487 
488 
489 
490 
491 
492 
493 
494 
495 
496 



J OPERATOR MUST TURN POWER ON HERE 

?ROUTINE TO RE- STORE ACTIVE REGISTER AF TE° PE-STAFT. 



001310 
001314 
001320 
001322 
001324 
001330 
001332 
001334 
001340 
001342 
001344 
001350 



016706 
022726 
001401 
000000 
022726 
001401 
000000 
022726 
001401 



022726 
001401 



002252 
152525 



152525 
152525 
152525 



TEST2CH: 

CMP 
BEQ 

HALT5E : HALT 
CMP 
BEQ 
HALT 
CMP 
BEQ 
HALT 
CMP 
BEQ 



HALT6EI 



MOV SAVE/SP 
#152525, (SP)+ 
. + 4 

#152525/(SP>+ 
. + 4 

#152525, (SP)+ 
. + 4 

#152525, (SP)+ 
. + 4 



/TEST SAVE PEG FCP FAST MEMORY 

;'EST FAST MEVCFV %5 

;SAVE RFG I*? ERPCP 

JTEST SAVE PEG FCP FAST MEMORY 

} TEST FAST MEMORY %A 

?SAVE RFG IN ERPC? 

;TEST SAVE PEG FOR FAST MEMORY 

;T£ST FAST MEMORV 13 

;SAVE RFG IN FRPCF 

jTEST SAVE REG. FCfi FAST WEMCFY 

/TEST FAST MEMCPV %2 
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497 


001352 


000000 






HALT8E: 


HALT 




;SAVE RFG IN ERRCP 


498 


001354 


022726 


152525 






CMP 


#152525, (SF)+ 


?TEST SAVE PEG- FOR FAST MEMOPV 


499 


001360 


001401 








BEQ 


.+4 


JTEST FAST MEMCPV %1 


500 


001362 


000000 






HALT9E : 


HALT 




;SAVE RFG IN ERRCP 


501 


001364 


022726 


152525 






CMP 


#152525, (SP)+ 


/TEST FAST MEMORY %0 


502 


001370 


001401 








BEG 


.+4 




503 


001372 


000000 






HALT10E 




HALT 


;SAVE REG. IN ERROR 


504 


001374 


022706 


000774 






* CMP 


#774, SP 


;TEST STACK FCfi CORRECT ADDP. 


505 


001400 


001401 








BEQ 


.♦4 


?STACK SHOULD HAVF 2 WORDS. 


506 


001402 


000000 






HALT11E 




HALT 


;STACK HAS WRONG ADDfi. 


507 


001404 


000002 








RTI 




; RETURN FROM TRAP 


508 


















509 










5TEST ROUTINE 


TO CHECK PE-STAFT 


CAPABILITY 


510 










;USIFG 


THE PR. 


INSTRUCTION 




511 










; OPERATOR MUST 


SET HALT SWITCH 


TO ENAPLE POSITION 


512 
513 


001406 


012706 


001000 




ALTEST: 


MOV 


#1000, SP 


;SET UP STACK 


514 


001412 


004767 


002212 






JSR 


PC, SETSWP 


?SET UP SWR PCINTFR 


515 


001416 


004767 


002330 






JSR 


PC, UPDATE 


/UPDATE SWR 


516 


001422 


012767 


000357 


176346 


LPALl: 


MOV 


#357, STATUS 


;SET UP CONDITION CODES 


517 


001430 


012767 


000005 


176370 




MOV 


#5,PFHAND+2 


;SET UP POWER FAIL CODES 


518 


001436 


012767 


001470 


176360 




MOV 


#ALT2,PFHAND 


;SET UP POWFR DOfeN POINTER 


519 


001444 


012706 


001000 






MOV 


#1000/SP 


?SET UP STACK 


520 


001450 


000777 






REALST: 


BR 




;WAII FOR PCKFfi FAIL 


521 


001452 


004767 


002226 






JSR 


PC/ PRINT 


; END-OF-F ASS NSC 


522 


001456 


004544 


176512 






MSG5 






523 


001460 


005767 






TST 


SWREG 


?LOOF ON TEST? 


524 


001464 


002356 








BGE 


LP ALT 


;YES 


525 


001466 


000000 








HALT 




; NCPM AL TEST HALT NC ERRORS 


526 


















527 










;STORE 


ROUTINE 


FOR ALTEST 




528 


















529 


001470 


022706 


000774 




ALT2: 


CMP 


#77 4,SP 


;HAS STACK PEEK PUSHED TfclCE 


530 


001474 


001406 








BEQ 


ALT2A 


;VES STACK CORRECT 


531 


001476 


010667 


002064 






MOV 


SP/SAVE 


;SAVE STACK IC INTERAGATE 


532 


001502 


012767 


001510 


176314 




MOV 


#ALT2X/PFH AND 


;SET UP ERROR POINTER 


533 


001510 


000000 






ALT2X: 


HALT 




;STACK WAS PUSHED >2< 


534 


001512 


022767 


001450 


177254 


ALT2A: 


CMP 


#REALST/774 


?DOES STACK CONTAIN CORRECT ADDRESS 


535 


001520 


001404 








BEQ 


ALT2B 


;STACK CONTAIN LCC PR. 


536 


001522 


012767 


001530 


176274 




MOV 


#ALT2AX/PF HAND 




537 


001530 


000000 






ALT2AX: 


HALT 




LOCATION 774 INCORRECT 


538 


001532 


010667 


002030 




ALT2B: 


MOV 


SP/SAVE 


;SA?E STACK 


539 


001536 


012767 


001554 


176260 




MOV 


#ALT2C/ PFHAND 


;SE T UP RESTART POINTER 


540 


001544 


012767 


000005 


176254 




MOV 


#5,PFHAND+2 




541 


001552 


000000 








HALT 




;END OF STORE ROUTINE 


542 


001554 


016706 


002006 




ALT2C! 


MOV 


SAVE/SP 


;RE-SET STACK 


543 


001560 


062716 


000002 






ADD 


#2/(SP) 


;SET NEW RETURN ADDRESS 


544 


001564 


000002 








RTI 




;PETURN TO LOC (BP- ) + l 


545 


















546 


















547 


















548 










; 








549 


















550 


















551 


















552 
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SEQ 0011 



553 








554 








555 








556 








557 








558 








559 


001566 


012706 


001000 


560 


001572 


004767 


002032 


561 


001576 


004767 


002150 


562 


001602 


012767 


000357 


563 


001610 


012767 


000005 


564 


001616 


012767 


001674 


565 


001624 


012706 


001000 


566 


001630 


012767 


003560 


567 


001636 


012767 


000005 


568 


001644 


104002 




569 


001646 


000776 




570 


001650 


016767 


001730 


571 


001656 


004767 


002022 


572 


001662 


004573 




573 


001664 


005767 


176306 


574 


001670 


002344 




575 


001672 


000000 




576 








577 








578 








579 








580 


001674 


016767 


176130 


581 


001702 


012767 


002034 


582 


001710 


022706 


000774 


583 


001714 


001414 




584 


001716 


022706 


000770 


585 


001722 


001411 




586 


001724 


012767 


001744 


587 


001732 


012767 


000005 


588 


001740 


010667 


001622 


589 


001744 


000000 




590 


001746 


012767 


001770 


591 


001754 


012767 


000005 


592 


001762 


010667 


001600 


593 


001766 


000000 




594 








595 








596 








597 


001770 


016706 


001572 


598 


001774 


22706 


000774 


599 


002000 


001723 




600 


002002 


022706 


000770 


601 


002006 


001403 




602 


002010 


010667 


001552 


603 


002014 


000000 




604 


002016 


022767 


003560 


605 


002024 


001711 




606 


002026 


011667 


001534 


607 


002032 


000000 




608 









176166 
176210 
176200 

176172 
176166 



176152 



>TEST ROUTINE TO CHECK RESTART 
;USING THE EMULATOR TRAP FOR A 
J OPERATOR MUST SET HALT SWITCH 

; 

} 

ALTSTl ! MOV #1000, 

JSR PC, 

JSR PC, 
LPALT1: MOV #3 57, STATUS 

MOV 
MOV 



CAPABILITY 
WAIT 

TO ENABLE POSITION 



MOV 
MOV 
MOV 

EMTWT: EMT 

BP 

ALTST2: MOV 

JSR 

MSG6 

TST 

BGE 

HALT 



SP 

SETSWR 
UPDATE 
?SET UP 
#5,PPHAND+2 
#ALT3A,PFHAND 
#1000, SP 
#LRTI,EMTPP 
#5,EMTRP+? 
+2 
.-2 

SAVE7,EMTRP 
PC, PRINT 

SWREG 
LPALT1 



>SET UP STACK 

;SET UP SWR POINTER 

jUPD ATE SWR 

CONDITION CODES 

;SET UP POWER FAIL CODES 

;SET UP POWER DOWN POINTER 

;SET UP EMT TRAP 

^EMULATOR TRAP 

;END-OF-PASS MSG 

JLOOP ON TEST? 
;YES 

;NORMAL HALT NO ERRORS 



001702 
176120 



176072 
176066 



176050 
176044 



;ROUTINE TO STORE ACTIVE REGISTERS 



ALT3A: 



ALT3BX 
ALT3C: 



; 

ALT3D: 



176744 ALT3E: 



DOWN 






MOV 


EMTRP,SAVE7 


;SAVE EMULATOR TRAP 


MOV 


#ALT3X,EM?RP 


;SET UP ERROR HALT 


CMP 


#774, SP 


;HAS STACK BEEN PUSHED TWICE 


BEQ 


ALT3C 




CMP 


#770, SP 


;HAS STACK BEEN PUSHED 4 TIMES 


BEQ 


ALT3C 




MOV 


#ALT38X, PFHA ND 


;SET UP POWER FAIL POINTER 


MOV 


#5,PFHAND+2 




MOV 


SP,SAVE 


;SAVE STACK 


! HALT 




;STACK INCORRFCT (STACK PUSHED LESS THAN 2 OR NCRF. THAN 


MOV 


#ALT3D,PFHAND 


;SET UP RE-START POINTER 


MOV 


#5,PFHAND+2 


;SET UP NEW STATUS 


MOV 


SP,SAVE 




HALT 




;END OF STORE ROUTINE 


*E TO ' 


TEST POWER UP SEQUENCE 


MOV 


SAVE,SP 


;RESTOfcE STACK 


CMP 


#774,SP 


;WAS STACK PUSHED ONLY TWICE 


BEQ 


ALTST2 


> 


CMP 


#770, SP 


; ARE WE DOING AN EMT 


BEQ 


ALT3E 




MOV 


SP,SAVE 


;STACK IN SAVE REG. 


HALT 




;STACK INCORRECT 


CMP 


#LRTI,770 


;DOES STACK CONTAIN CORRECT INFO 


BEQ 


ALTST2 


;yes EXIT 


MOV 


(SP),SAVE 




HALT 




;STACK CONTAINS WRONG ADDRESS 



.MAIN. 


MACY11 


30(1046) 


01-NOV 


DZKAQG.QRC 27-OCT-77 


08:52 


609 








611 








611 


002034 


000000 




612 








613 








614 








615 








616 








617 








618 








619 


002036 


012706 


001000 


620 


002042 


004767 


001562 


621 


002046 


004767 


001700 


622 


002052 


012706 


001000 


623 


002056 


012767 


002112 


624 


002064 


012767 


000005 


625 


002072 


000001 




626 


002074 


004767 


001604 


627 


002100 


004622 




628 


002102 


005767 


176070 


629 


002106 


002361 




630 


002110 


000000 




631 








632 








633 








634 








635 








636 








637 








638 


002112 


022706 


000774 


639 


002116 


001411 




640 


002120 


010667 


001442 


641 


002124 


012767 


002140 


642 


002132 


012767 


000000 


643 


002140 


000000 




644 


002142 


012767 


003560 


645 


002150 


012767 


000005 


646 


002156 


005067 


001422 


647 


002162 


104000 




648 


002164 


022706 


000774 


649 


002170 


001407 




650 


002172 


012767 


002206 


651 


002200 


012767 


000000 


652 


002206 


000000 




653 


002210 


062767 


000001 


654 


002216 


022767 


000043 


655 


002224 


001356 




656 


002226 


012767 


002242 


657 


002234 


010667 


001326 


658 


002240 


000000 




659 








660 








661 








662 








663 








664 









:00 PAGE 12 



ALT3X: HALT 



175740 
175734 



;FMT ACTIVE INSTEAD OF POWER FAIL CN POWER DCWK 
;kmt ACTIVE ON RESTART INSTEAD CF POWER FAIL 



;ROUTINE TO CHECK TWO MILLISECOND STORE TIME 

; AVERAGE INSTRUCTION TIME 

;ROUTINE WAITS FOR SHUT DOWN IN EMT LOOP 



175672 
175666 



175660 
175654 



175624 
175620 



001366 
001360 



MOV 


#1000, SP 


;SET UP STACK 


JSR 


PC, SETSWR 


;SET UP SWR POINTER 


JSR 


PC, UPDATE 


JUPDATE SWR 


MOV 


#1000, SP 


;SET UP STACK 


MOV 


#TEST3A,PFHAND 


;SET UP POWER FAIL STORE POINTER 


MOV 


#5,PFHAND+2 


;SET UP STATUS 


WAIT 




;WAIT FOR INTERRUPT 


JSR 


PC, PRINT 


;END-OF-PASS VSG 


MSG7 






TST 


SWREG 


;LOOP ON TEST? 


BGE 


LPTST3 


;yes 


HALT 




;NORMAL TEST HALT NO ERRORS 






;LOOP ON TEST 






jRESTART PROGRAM 



; OPERATOR MUST TURN POWER OFF AND ON HERE 

; 

;TEST FOR 2 MILLISECONDS OF AVERAGE INSTRUCTION TIME 
JTIME OF LOOP 57.4 MICROSECONDS 
TEST3A: 



CMP 


#774,SP 


;IS STACK CORRECT 


BEQ 


TEST3B 


^STACKER IS CORRECT 


MOV 


SP,SAVE 


^CONTENTS OF STACK IN SAVE REG. 


MOV 


#HALT12E,PFHAND 


;SETUP ERROR HALT 


MOV 


#0,PFHAND+2 


;SETUP STATUS WORD 


:HALT 




;WAIT FOR RE-START 


MOV 


#LRTI,EMTRP 


;SET UP EMULATOR TRAP 


MOV 


#5,EMTRP+2 


;SET UP EMULATOR STATUS 


CLR 


SAVE7 


;SET COUNT TO ZERO 


EMT+0 




J EMT TRAP (EMT L00P=57.4 MICROSEC) 


CMP 


#774,SP 


;IS STACK CORRECT AFTER EMT 


BEQ 


TEST3D 


; STACK CORRECT CONTINUE 


MOV 


#HALT13E,PFHAND 


;SETUP ERROR HALT 


MOV 


#0,PFHAND+2 


;SETUP STATUS 


iHALT 




;WAIT FOR RE-START 


ADD 


#1,SAVE7 


;+i COUNT 


CMP 


#35.,SAVE7 


;HAS LOOP TAKEN 2 MILLISECONDS 


BNE 


TIMLOP 


JTIME LESS THAN 2 MILLISECONDS 


MOV 


#TEST3CH,PFHAND 


;SET POWER FAIL POINTER 


MOV 


SP,SAVE 


;SAVE STACK 


HALT 




;ROUTINE COMPLETE 



;PROGRAM RESTART ROUTINE 



•WAIN. 
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SEC 0013 



665 
666 
667 
668 
669 
670 
671 
672 
673 
674 
675 
676 
677 
678 
679 
680 
681 
682 
683 
684 
685 
686 
687 
688 
689 
690 
691 
692 
693 
694 
695 
696 
697 
698 
699 
700 
701 
732 
703 
704 
705 
706 
707 
708 
709 
710 
711 
712 
713 
714 
715 
716 
717 
718 
719 
72* 



002242 
002246 



016706 001320 



TEST3CH: MOV SAVE,SP ;RESTCRE STACK 

RTI JPETURN TO TEST3 

} 
} 
} 

} 

;ROUTINE TO TEST FOR 2 MILLISECONDS CF AVERAGE INSTRUCTION TIME 

;ACTXVE TIME BEFORE NEX"" POWER LOW FLAG. 

JEMT LOOP TAKES 56 MICROSECONDS 

?THE OPERATOR MUST TURN POWER OFF AND C« 

; VIGOROUSLY 



002250 


012706 


001000 




TEST4 : 


MOV 


#1000, SP 


;SET UP STACK 




002254 


004767 


001350 






JSR 


PC/ SETSWP 


;SET UP SW« POINTER 




002260 


004767 


001466 






JSR 


PC, UPDATE 


/UPDATE SWR 




002264 


12706 


001000 




LPTST4 : 


MOV 


#1000, SP 






002270 


012767 


002324 


175526 




MOV 


#TEST4A,PFHAND 


;SET POINTER TC HALT 




002276 


012767 


000005 


175522 




MOV 


#5,PFHAWD+2 






002304 


000001 








WAIT 




/WAIT FOR PCfeER FAIL 




002306 


04767 


001372 




TEST4E: 


JSR 


PC, PRINT 


: FNn- np-P c; c tier 




002312 


004650 








MSG8 








002314 


005767 


175656 






TST 


SWREG 


/LOOP C *' "'"EST? 




002320 


002361 








BGE 


LPTST4 


; YES 




V v £. OX Z 


a v t3 v V tO 








HALT 




•WAIT tfqt ruirp ur cooroc 




002324 


22706 






TEST4 A : 


CMP 


#774, SP 


/ 1 J O ! ft L l\ tUBKtll 




a a £ o *3 v 


01411 








BEQ 


TEST4° 






002332 


Vj 1 v o u / 


Jo V3 J. £ 3 *y 






MOV 


SP,SAVE 






002336 


012767 


002352 


175460 




MOV 


#HALT14E,PFHAND 






002344 


012767 


000005 


175454 




MOV 


#5,PFHAND+2 






002352 


000300 






HALT14E" 


HALT 




;STACK DID NOT CONTAIN 774 




002354 


012767 


002376 


175442 


TES'MP: 


MOV 


# T EST4CH,PFHAND 


;SE T UP RE-START POINTER 




002362 


012767 


000005 


175436 




wnv 


#5,PFHAND+2 


;SET UP STATUS 




002370 


010667 


001172 






MOV 


SP,SAVE 






002374 


000000 








HALT 
















;ROUTINE TO TEST FOR 2 MJLLISEC 


GNDS UP TI"E (AVERAGE INSTRUCTION T 


[ME) 


002376 


012767 


002472 


175420 


TEST4CH' 


MOV 


#HALT15E,PFHAND 


JSET UP HALT IF TRAP OCCURS BF FORE 


2 *IILISECCNCS 


002404 


012767 


003560 


175416 




MOV 


#LRTI,E*TRP 


;SE T UP EMULATOR TRAP 




002412 


016706 


001150 






MOV 


SAVE,SP 


;PESTORE STACK 




002416 


005067 


001162 






CLR 


SAVE? 


;ZEPC SAVE 7 




002422 


104001 






UPTIME : 


EMT + 1 




/ FMT TRAP (LCCP = 5f. "1CRCSFC) 




002424 


022706 


000774 






CMP 


#774, SP 


z T E S T S'ACK 




002430 


001407 








BEQ 


TESMD 


JSTACK IS CORRECT CONTINUE 




002432 


012767 


002474 


175364 




MOV 


j/HALT16E,PFFAND 


;SET UP ERROR HALT 




002440 


012767 


000000 


175360 




MOV 


#0,PFHAM+2 


?S£T UP STATUS 




002446 


000001 








is AIT 




;KAIT FOR PCuFR FAIL 




002450 


062767 


000001 


001126 


TEST4D : 


ADD 


#1,SAVE7 


;+i COUNTFR 




002456 


022767 


000044 


*301120 




CMP 


#36.,SAVE7 


;»AS LOOP TAKEN 2 MILLISECONDS 




092464 


001356 








BNE 


UPTIME 


YET 2 MILLISECONDS 




002466 


000167 


177614 






JMP 


TES T 4F 


;THF POWER HAS F E P N UP FOR 2 MILLIS C CCNCS 
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721 
722 
723 
724 
725 
726 
727 
728 
729 
730 
731 
732 
733 
734 
735 
736 



002472 
002474 



HALT15E:HALT 
HALT16ETHALT 



;VJE BID NOT HAVE 2 MILLISECONDS CF PCV'EF CK 
;STACK TNCCPRECT AFTER EMULATOR TRAP 



MEMORY POWER ON/OFF TEST 

LOAD MEMORY WITH SET DATA PATTERN 

THEN COMPARE DATA FOR PIT DROP OUT OR PIT PICK UP 
RE-ENTER COMPARE ROUTINE IF PCWEf FAIL OCCURS 

ROUTINE TO DETERMINE THE AMOUNT OF MEMORY 
ROUTINE TESTS FOR A MAX OF 2PK 



737 


002476 


012706 


001010 




TESTS: 


MOV 


#1000, SP 


;S£T UP STACK 


738 


002502 


004767 


001176 






JSR 


FC, PRINT 


;OUTFUT TITLE 


739 


302506 


004352 








MSG1 






740 


002510 


004767 


001114 






JSR 


FC, SETSWR 


;SET UP SWR POINTER 


741 


002514 


004767 


001232 






JSR 


PC, UPDATE 


/UPDATE SVifi 


742 


002520 


005067 


001040 






CLR 


TEMPST 


JCLEAP T£MP. STORAGE 


743 


002524 


005067 


002216 






CLR 


PINFLC 


;CLFAP PKF INT FLAG 


744 


002530 


012767 


002576 


175246 


LPTST5: 


MOV 


#TREMST,4 


;SET UP FCR BUS TRAP 


745 


002536 


012767 


000340 


175242 




MOV 


#340,6 


;LOCK UP PRIORITY LEVELS 


746 


002544 


012706 


001000 






MOV 


#1000, SP 




747 


002550 


005067 


001012 






CLR 


SAVE 


;SET UP TEST FOR FK 


748 


002554 


005777 


001006 




EXMST : 


TST 


gSAVE 


;TEST MEMORY FOP AVAILABILITY 


749 


002560 


062767 


004000 


001000 




ADD 


#4000, SAVE 


;SET UP TEST FCR NEXT IK 


750 


002566 


022767 


160000 


000772 




CMP 


#160000, SAVE 


/TEST FCR BUS TRAP ERROR 


751 


002574 


001367 








BHE 


EXMST 


; TEST NEXT 4K ELCCK 


752 


002576 


005737 


000042 




TREMST : 


TST 


@#42 




753 


002602 


001407 








BEQ 


- + 20 




754 


002604 


022737 


003102 


000042 




CMP 


#LCGICAL,(?842 




755 


002612 


001403 








BEQ 


- + 10 




756 


002614 


162767 


003000 


000744 




SUB 


#3000, SAVE 




757 


002622 


162767 


000500 


000736 




SUB 


#500, SAVE 


;SET UP FOR LAST AV A IL APLF PANK 


758 


002630 


016767 


000732 


000724 




MOV 


SAVE,HLIMIT 


;l AST AVAILABLE MFMCRY ADDRESS 


759 


002636 


012767 


000006 


175140 




MOV 


#6,4 


; RESTORE TRAP K ALT POINTER 


760 


002644 


016767 


000706 


175134 




MOV 


HLT,6 


^RESTORE HALT. 


761 


002652 


012767 


003166 


175144 




MOV 


#TEST5A,PFHAND 


;SET UP POINTER 


762 


002660 


012706 


001000 






MOV 


#1000, SP 


;SET UP STACK 


763 


002664 


012702 


004750 






MOV 


#LLIMIT,%2 


;LOK MEMORY LIMIT 


764 


002670 


012722 


152525 




FILDAT: 


MOV 


#152525,(2)+ 


/LOAE DATA INTO MFMORY 


765 


002674 


026702 


000662 






CMP 


HLIMIT,%2 


;CCMPARE FOR LAST MEMEORY LOCATION 


766 


002700 


001373 








BSE 


FILDAT 


;LOAD NEXT LOCATION 


767 


002702 


012702 


004750 




cmdx: 


MOV 


#LLIMIT,*2 


;SETUP FOR COMPARF 


768 


002706 


026702 


000650 




CMDAT : 


CMP 


HLIMIT,S2 


;TEST FOR LAST ADDRESS 


769 


002712 


001103 








BNE 


ACTMOD 




770 
771 
















;TEST THE TTY BUFFER 


772 
















;FOR A CONTROL-G 


773 


















774 


002714 


105737 


177560 






TSTP 


gffTKS 


;CHAR IN PUFFER? 


775 


002720 


100020 








BPL 


50$ 


;N0 


776 


002722 


013705 


177562 






MO? 


@#TKB, %5 


;STORF CHAR 
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SEQ 0015 



777 


002726 


042705 


177600 






BIC 


#177600, 


%5 ;SIRIP 8TP PIT 


778 


002732 


122705 


000007 






CHPB 


#7 # %5 


;COPTPOL-G? 


779 


002736 


001401 








BEQ 


40$ 


;VES 


7 80 


002740 


000418 








BR 


50$ 


;no 


781 


002742 


016767 


175230 


001772 


40$: 


MOV 


SWREG, TEMSWR 


;SAVE SWREG 


78? 


002750 


042767 


040000 


175220 




BIC 


#40000, SWREG 


;ENABLE TTY PRINTING 


793 


002756 


004767 


000776 






JSH 


PC, UPDAT1 


;UPDATE SWR 


7 84 


002762 


105767 


000576 




50$: 


TSTR 


TEMPST 


;PWR FAIL OCCURRED? 


785 


002766 


100016 








BPL 


EOP 


?NO 


786 


002770 


32767 


040000 


175200 




BIT 


#40000, SWREG 


; TTY PRINTING DISABLED? 


787 


002776 


001026 








BM 


CKACT 


JVES 


788 


033000 


012767 


000001 


001740 




MOV 


#1, PINFLG 


;SET PKR INT FLAG 


789 


003006 


004767 


000672 






JSfc 


PC, PRINT 


;OUTPUT PWR FAIL WSC 


79$ 


003012 


003614 








MSG 






791 


003014 


005067 


001726 






CLR 


PINFLG 


;CLEAR PWR INT FLAG 


79? 


003020 


005067 


000540 






CLR 


TEMPST 


/ 


793 


003024 


032767 


040000 


175144 


EDP: 


BIT 


#40000, SWREG 


;TTY PRINTING DISABLED? 


794 


003032 


001010 








BNE 


CKACT 


;yes 


795 


003034 


012767 


000001 


001704 




MOV 


#1, PINFLG 


;SET PWP INT FLAG 


796 


003042 


004767 


000636 






JSR 


PC, PRINT 


;END-OF-PASS ¥SQ 


797 


003046 


004436 








MSG2 






798 


003050 


005067 


001672 






CLR 


PINFLG 


;CLEAR PWR INT FLAG 


799 


003054 


013700 


000042 




CKACT : 


MOV 


@#42,%0 


* 


800 


003060 


001004 








BNE 


AUTO 


;BR IN AUTO MODE 


801 


003062 


005767 


175110 






1ST 


SWREG 


;LDOF ON TEST? 


802 


003066 


002013 








BGE 


LOC 


;YES 


803 


003070 


000000 








HALT 




/HALT TFST OVER NT ERRORS 


804 


003072 


005767 


000456 




AUTO: 


TST 


FLAG 




80 s ; 


003076 


001407 








BEQ 


LOC 




806 


003100 


000*05 








RESET 






807 


003102 


004710 






LOGICAL 


SJSR 


%7,(0) 




808 


003104 


000240 








NOP 






809 


003106 


000240 








NOP 






810 


003110 


000240 








NOP 






811 


003112 


000137 


000200 






JMP 


@#200 




812 


003116 


000167 


177406 




LOC: 


JMP 


LPTST5 




813 


003122 


022722 


152525 




ACTMOD: 


CMP 


#152525,(2)+ 


;TEST DATA 


814 


003126 


001667 








BEQ 


CMDAT 


;COMPARF NEXT WORD 


815 


003130 


010267 


000434 






MOV 


%?,SAVE1 


J ADDRESS OF ERROR + 2 


816 


003134 


162767 


000002 


000426 




SDB 


#2,SAVE1 


;SUPTRACT TO CALCULATE CORRECT ADDRESS 


817 


0553142 


016700 


000422 






MOV 


SAVE1, LIGHTS 


;DA'A ERROR IN THIS ADDRESS 


818 


003146 


012767 


003154 


174650 




MOV 


#HALT18E,PFHAND 


/SET UP POWER FAIL TRAP FOR ERROR 


819 
820 


003154 


000000 






HALT18E 


:HALT 




/LCC DATA LIGHTS CONTAINS BAD DATA 


"21 










/FAILING ADDRESS IN DATA LIGHTS 




822 


003156 


17700 


000406 




conad: 


MOV 


@SAVE1, LIGHTS 


/PUT DATA IN DISPLAY LIGHTS 


823 


003162 


000000 






HALT19E 


:HALT 




?BAD DATA 


824 


003164 


000650 






CONAC: 


BR 


CMDAT 


;COMPARE WEXT WORD 


825 










/ENTER 


THIS ROUTINE WHEN POWER FAIL OCCURPS 


826 










; STORE 


ALL ACTIVE REGISTERS THEN 


HALT; 


827 


003166 


010046 






TESTS A: 


MOV 


LIGHTS, -(SP) 


;SAVE LIGHTS 


82P 


003170 


010246 








MOV 


%2,-(SP) 


;SAVE MEMORY ADDRESS 


829 


003172 


005767 


001550 






TST 


PINFLG 


;PWR FAIL DURING PRINTOUT? 


830 


003176 


001053 








BFE 


BR1 




831 


003200 


022706 


000770 






CMP 


#770, SP 


;IS STACK CORRECT 


832 


003204 


001411 








BEQ 


TEST5F. 


;STACK CORRECT 



•MAIN. 


MACY11 


30(1046) 


01-NOV 


-77 14: 


80 PAGE 


16 






DZKAQC. 


QRC 27-0CT-77 


08:52 












833 


003206 


010667 


000354 






MOV 


SP,SAVE 


;STACK SAVED 


834 


003212 


012767 


003226 


174604 




MOV 


#HALT20E,PFHAND 




835 


003220 


012767 


000005 


174600 




MOV 


#5,PFHAND+2 


;SET UP STATUS 


836 


003226 


000000 






HALT20E:HALT 




;WAIT FOR RE-START 


837 


003230 


012767 


003550 


174566 


TEST5E : 


MOV 


#HALT21E,PFHAND 


;SET UP FOR 2 MILLISECOND DOWN TIVE ERRCR 


838 


033236 


012767 


000005 


174562 




MOV 


#5,PFHAND+2 


; AVER AGE INSRUCTICN TIME 


839 


003244 


012767 


003560 


174556 




MOV 


#LRTI,EMTRP 


;SET UP EMULATOR TRAP 


840 


003252 


012767 


000005 


174552 




MOV 


#5,EMTRP+2 




841 


003260 


005067 


000320 






CLR 


SAVE7 


/CLEAR COUNT REGISTER 


842 


003264 


104002 






MASTIM : 


EMT 


+ 2 


;EXECUTE EMT 


843 


003266 


022706 


000770 






CMP 


#770, SP 


;IS STACK CORRECT AFTER TRAP 


844 


003272 


001406 








BEQ 


XTIME 


;YES 


84^ 


003274 


010667 


000266 






MOV 


SP,SAVE 




846 


003300 


012767 


003306 


174516 




MOV 


#HALT22E,PFHAND 


;NO SET UP ERROR TRAP STACK NOT CORRECT 


847 


003306 


000000 






HALT22E 


:HALT 




;STACK SHOULD EQUAL 770 (SAVE REG. 


848 
















;CONTAINS CONTENTS OF STACK) 


849 


003310 


062767 


000001 


000266 


XTIME: 


ADD 


#1,SAVE7 


; ADD TO TIME COUNT 


850 


003316 


022767 


000027 


000260 




CMP 


#23.,SAVE7 


;TS TIMF OK 


851 


003324 


001357 








BNE 


MASTIM 




852 


003326 


012767 


003364 


174470 


BRl: 


MOV 


#TEST5CH,PFHAND 


;YES SETUP RESTART ADDRESS 


353 


003334 


012767 


000005 


174464 




MOV 


#5,PFHAND+2 


;SAVE STACK 


854 


003342 


010667 


000220 






MOV 


SP,SAVE 




855 


003346 


010367 


000234 






MOV 


%3, SAVE8 


;SAVE REGISTERS 


856 


003352 


010467 


000232 






MOV 


%4, SAVE9 




857 


003356 


010567 


000230 






MOV 


%5, SAVE10 




858 


003362 


000000 








HALT 







859 
860 
861 

862 

863 



RESTORE ACTIVE REGISTERS AND RETURN FROM INTERRUPT 



864 


0"3364 


016706 


000176 




TEST5CH 


:mov 


SAVE,SP 


/RESTORE STACK 


865 


003370 


016703 


000212 






MOV 


SAVE8, %3 


;RESTORE REGISTERS 


866 


003374 


016704 


000210 






MOV 


SAVE9, %4 




867 


003400 


016705 


000206 






MOV 


SAVE10, %5 




868 


003404 


005767 


001336 






TST 


PINFLG 


;PWP FAIL DURING PRINTOUT? 


869 


003410 


001040 








BNE 


BR2 


;yes 


870 


003412 


022706 


000770 






CMP 


#770, SP 


;IS STACK CORRECT 


871 


003416 


001404 








BEQ 


UPXTIM 




872 


003420 


012767 


003426 


174376 




MOV 


#HALT23E,PFHAND 


;SET UP FOR STACK ERROR TRAP 


873 


003426 


000000 






HALT23E: HALT 






874 


003430 


012767 


003552 


174366 


UPXTIM: 


MOV 


#HALT24E,PFHAND 


/SET UP FOR 2 MILLISECOND UP TIME ERROR 


875 


003436 


012767 


000005 


174362 




MOV 


#5,PFHAND+2 


876 


003444 


05067 


000134 






CLR 


SAVE7 


/CLEAR COUNT REGISTER 


877 


003450 


104003 






EMTUP: 


EMT 


+3 


;EXECUTE EMULATOR TRAP 


878 


003452 


062767 


000001 


000124 




ADD 


#1,SAVE7 


; INCREMENT EMULATOR TRAP COUNT 


879 


003460 


022706 


000770 






CMP 


#770, SP 


;IS STACK CORRECT AFTER EMT 


880 


003464 


001406 








BEQ 


CNTEMT 


;YES 


881 


003466 


012767 


003500 


174330 




MOV 


#HALT25E,PFHAND 


;STACK NOT CORRECT (SET UP ERROR HALT) 


882 


003474 


010667 


000066 






MOV 


SP,SAVE 


883 


003500 


000000 






HALT25E:HALT 




;STACK DID NOT = 770(SAVE REGISTER 


884 
















;CONTAINS CONTENTS OF STACK 


885 


003502 


022767 


000043 


000074 


CNTEMT : 


CMP 


#35.,SAVE7 


;HAS POWER BEEN UP 2 MILLISECONDS 


886 


003510 


001357 








BNE 


EMTUP 




887 


003512 


012602 






BR2: 


MOV 


(SP)*,%2 


;NO EXECUTE NEXT EMT 


888 


003514 


012600 








MOV 


(SP)+,LIGHTS 


;YES TIME OK 
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890 
891 
892 
893 
894 
895 
896 
897 
898 
899 
900 
901 
902 
903 
904 
905 
906 
907 
908 
909 
910 
911 
912 
913 
914 
915 
916 
917 
918 
919 
920 
921 
922 
923 
924 
925 
926 
927 
928 
929 
930 
931 
932 
933 
934 
935 
936 
937 
938 
939 
940 
941 
942 
943 
944 



003516 012767 

003524 012767 

003532 012767 

003540 152767 

003546 000002 

003550 000000 

003552 000000 



003554 
003556 
003560 
003562 
003564 



003566 
003570 
003572 
003574 
003576 
003600 
003602 
003604 
003606 
003610 
003612 



003614 
003622 



003630 
003634 
003640 
003646 
003652 
003654 
003662 
003664 
003670 
003674 
003702 



000240 
177777 
000000 
000002 
017500 
000000 



000000 
000004 



000000 
000000 



000000 
000000 
00 



177560 
177562 
177564 
177566 
005015 
040506 
003630 

313746 
013746 
012737 
005777 
000404 
012767 
022626 
012637 
012637 
017767 
000207 



003166 
000005 
177777 

000200 



174300 
174274 
000014 
000016 



053520 
046111 



MOV 
MOV 
MOV 
BISB 
RTI 

HALT21E:HALT 
HALT24ES H ALT 

; 
? 

9 

; 
) 
) 
} 

NOP-240 
FLAGS177777 
HLT: HAL? 
LRTI : RTI 
HLIMIT: 17500 
TEMPSTS 

;UORK REGISTERS 

SAVE: 

SAVE1: 4 

SAVE2: 

SAVE3: 

SAVE4: 

SAVES: 

SAVE6: 

SAVE7: 

SAVE8: 

SAVE9: 

SAVE10: 



TKS=177560 
TKB=177562 
TPS=177564 
TPB=177566 
MSG: . ASCIZ 



003654 
174362 

000176 

000004 
000006 
174334 



#?EST5A,PFHAND 
#5 # PFHAND+2 
#177777, FLAG 
#200,TEMPST 



003704 032767 040030 



174352 IS: 
2S: 

174274 
174264 



. EVEN 

MOV 

MOV 

MOV 

TST 

BR 

MOV 

CMP 

MOV 

MOV 

MOV 

RTS 



;REST ARE ACTIVE REGISTER 
/RETURN FROM POWER FAIL TRAP 
;SET POWER FAIL Fl AG 



/WE DTD NOT HAVE TWO MILLISECONDS TO STCRF ACTIVE 
/POWER WAS NOT ACTIVE FOR TViO MILLISECONDS 



<15><12>.PWP FAIL- 



g*6,-(SP) 
0#4,-(SP) 
#1$,@#4 
gSMRG 

2$ 

#SWREG,SkRG 

(SP)+,(SP)+ 

(SP)+,8*4 

(SP)+,@*6 

@SkPG, SKRFG 

PC 



;SAVE CUFPENT VECTOR 

/SET UP TIMFOUT VFCTOP 
/TRY TO REFERENCE HARDWARE 
; BR IF «C TTMEOUT OCCURS 
/POINT TC SOFTWARE SWR 
/RESTORE STACK 
;RESTCRE TIMEOUT VECTOR 



;SAVE SWR AT LCC 176 



PRINT: BIT 



#40000, S«REG ;SR14 SET? 
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945 


003712 


001014 








BNE 


RETURN 




JVES -£ TSABLE PRINTING 


946 


003714 


023727 


000042 


003102 




CMP 


g#42, 


^LOGICAL 


/UNDE& ACT? 


947 


003722 


001410 








BEQ 


RETURN 




;Y£S 


948 


003724 


011603 








MOV 


(SP), 


%3 


/ADDRESS OF MSG AFTER JSR 


949 


003726 


011303 








MOV 


(%3>, 


%3 


/address OF FTRST CHAR OF MSG 


950 


003730 


105737 


177564 




4$: 


TSTP 


(§#tps 




/PUFFER JtEADV? 


951 


003734 


100375 








BPL 


4$ 




;»'0-LOCP 


952 


003736 


112337 


177566 






MOVR 


(%3)+, 


@*TPB 


/YES-PD* MSG CHAR INTO BUFFER 


953 


003742 


001372 








BNE 


4$ 




;CCNTINUE IF CHAR WAS NOT 


954 


003744 


062716 


000002 




RETURN: 


ADD 


#2, 


(SP) 


>SET UP RETURN 


955 


003750 


000207 








RTS 


PC 




;PETURN TO TEST 


956 


003752 


016767 


174220 


000762 


update: 


MOV 


SWREG, 


TEMSKP 


;STORE SWR VALUE 


957 


003760 


032767 


040000 


174210 


UPDATi: 


BIT 


#40000, 


SKREG 


/TTV PRINTING DISABLED? 


958 


003766 


001016 








BNE 


90$ 




/YES-RETURN TC TEST 


959 


003770 


023727 


000042 


003102 




CMP 


6#42, 


#LOGICAL 


/UNDER AC?? 


960 


003776 


001412 








BEG 


90$ 




/YES-PETURN Tr TEST 


961 


004000 


004767 


177700 






JSR 


PC, 


PPINT 




962 


004004 


004676 








MSG9 








963 


004006 


004767 


000014 






JSR 


PC, 


OUTPUT 


/PRIST CURRENT SUP VALUF 


964 


004012 


004767 


177666 






JSR 


PC, 


PPINT 




965 


004016 


004705 








MSG10 








966 


004020 


004767 


000102 






JSR 


PC, 


INPUT 


/UPDATE GR SAVE SHR 


967 


004024 


000207 






90$: 


RTS 


PC 






968 




















969 


















/PUNT CURRENT SfeF 


970 


















; AT THE TTY 


971 




















972 


004026 


012704 


004722 




output: 


MOV 


#TAP<LF, 


%4 


/POINT TO TABLE 


973 


004032 


016714 


000704 






MOV 


TEMSWF, 


(?4) 


/MOVE SAVED SWfc TC TABLE 


974 


004036 


011467 


000702 




8$: 


MOV 


(%4), 


ROTATE 


/SAVE CURRENT VALUE 


975 


004042 


042714 


177770 






BIC 


#177770 




(%4) /CONVERT ONE ASCII CHAS 


976 


004046 


062724 


000060 






ADD 


#60, 


'(%4)+ 


?POTNT TO NEXT LCC IN TABLE 


977 


004052 


022704 


004736 






CMP 


#TABLE+14, 


%4 ;TF 6TH DIGTT- 


978 


004056 


001411 








BEQ 


10$ 




;BR 


979 


004060 


016714 


000660 






MOV 


ROTATE, 


(%4) 


;POINT TO NEXT CHAR 


980 


004064 


000241 








CLC 








981 


004066 


006014 








ROR 


(%4) 






982 


004070 


000241 








CLC 








983 


004072 


006014 








ROR 


(%4) 






984 


004074 


000241 








CLC 








985 


004076 


006014 








ROR 


(%4) 






986 


004100 


000756 








BR 


8$ 






987 


004102 


105737 


177564 




10$: 


TSTP 


@#TPS 




/PRINTER READY? 


988 


004106 


100375 








BPL 


10$ 






989 


004110 


014437 


177566 






MOV 


~(%4), 


@#TPB 


;OUTPUT CHAR IN TABLE 


990 


004114 


022704 


004722 






CMP 


#TABLE, 


%4 


;OUTPUT ALL CHAR IN TABLE 


991 


004120 


001401 








BEQ 


12$ 






992 


004122 


000767 








BR 


10$ 




/CONTINUE 


993 


004124 


000207 






12$: 


RTS 


PC 






994 




















995 


















/UPDATE OR SAVE SfcR 


996 




















997 




















998 


004126 


005067 


000606 




INPUT: 


CLR 


CNTR 




/CLEAR CHARACTER COUNTER 


999 


004132 


005067 


000600 






CLR 


USKREG 




/CLEAR LAST UPDATED SVR 


1000 


004136 


012704 


004722 






MOV 


STABLE, 


%4 


/POINT TO TABLE 
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SEQ 0019 



1001 


004142 


105737 


177560 




14$: 


T STB 


8#TKS 




;CHAR I» BUFFER? 


1002 


004146 


100375 








BPL 


14$ 




;N0 


1003 


004150 


013714 


177562 






MOV 


8#TK8/ 


t%4) 


;PUT CHAR IN TABLE 


1004 


004154 


105737 


177564 




16$ 5 


T SIR 


@f TPS 




^PRINTER READY? 


1005 


004160 


100375 








BPL 


16$ 




?NQ 


1006 


004162 


011437 


177566 






MOV 


(%4)# 


QflTPB 


;ECHG INPUT 


1007 


004166 


042714 


177600 






BIC 


#177600/ 




(%4) /STRIP 8TH BIT 


1008 


004172 


122714 


000015 






CMPfl 


#15/ 


(14) 




1009 


004176 


001417 








BEQ 


20$ 




}YES 


1010 


004200 


122714 


000060 






CMPP 


#60/ 


(14 ) 


^ ILLEGAL CHAR? 


1011 


004204 


003055 








BGT 


22$ 




JYES 


1012 


004206 


122714 


avBv\* 1 






CMPB 


#67/ 


(%4 ) 


t Tf f fhit char? 


1013 


004212 


002452 








BLT 


22$ 




1 YES 


1014 


004214 


022767 


000006 


000516 




CMP 


#6# 


CNTR 


>7TH DIGIT? 


1015 


004222 


003446 








BLE 


22$ 




J YES 


1016 


004224 


062704 


000002 






ADD 


#2# 


%4 


;PQTHT TO NEXT TABLE LOC 


1017 


004230 


005267 


000504 






INC 


CNTR 




^INCREMENT CHARACTER COUNTER 


1018 


004234 


000742 








BR 


14$ 




^CONTINUE 


1 019 


004236 


005014 






20$: 


CLR 


(%4) 




>CLEAR CR FROM TABLE 


1020 


004240 


005767 


000474 






TST 


CNTR 




• tit wn n TnTTS WFBF TNPIIT- 


1021 


004244 


001431 








BEQ 


24$ 




inn <;ivf run «?un vat up 


1022 


004246 


1 27 4 


004722 






HOV 


#TABLE/ 


%4 


JPOINT TO TABLE 


1023 


004252 


042714 


000060 




26$: 


BIC 


#60/ 


(%4 ) 


JSTRIP ASCII BITS 


1024 


004256 


062467 


000454 






ADD 


(%4)+z 


USWREG 


•CREATE UPDATED SVR VALUE 


1025 


004262 


U 10 -J -JU I 


000452 






DEC 


CNTR 




sTIFrEFM FNT CHAR ATTFR PnilNTFB 


1026 


El El t 4C.QD 


El 133 ID I 


000446 






1ST 


CNTR 




if 1 <5T rniR INPUT? 


1027 


004272 


001412 








BEQ 


28$ 




/YES 


1028 


CI Bf 4774 


000241 








CLC 






* wn— crrr atf n tttt <; 




low *t Z ID 


W BDJ.O 1 


000434 






ROL 


nctuppn 






1030 


19 Kl *IUEf C 


000241 








CLC 












la HO X D / 


DBBliD 








U OH K &u 






1032 


SI0I4H CI 

V U *f J X VJ 


000241 








CLC 








1033 


004312 


cisifii fi7 

10 I0O X O 1 


000420 






ROL 


OSUREG 






1034 


Ju El *| Ji u 


onci7 c i |c i 

O vv 1 U »3 








BR 


26$ 




irnNTTNnR 




YJ Yi 1 u Z v 


16767 


000412 


1 7 ^fi'SPI 

Jl / JW UK/ 


28$: 


MOV 


U On It EaXMj 


SWREG 


• unvF upu vir hp *rr t nr 

/nU» t nCH 1 HliUC i. L LiUU J IQ 


1036 




CI 01617517 

El C? 10 £ d / 








RTS 


PC 




* BFTUPN 
/ n C# ' U rTW 




acid ne< 

E? wJ M O «3 W 




1010 D*f uu 


17 3640 


94< • 

• 


MOV 


TEMSMR, 


SWREG 


•PF«?fnDP HI Ti <JfcB VAT IIP 


1038 












RTS 


PC 




/f\& I u n w 


1 039 


00 4340 




177340 




22$: 


JSR 


PC/ 


PRINT 


/REPEAT PROMPTING MSG 


1 040 


004344 


004705 








MSG10 








1 041 


004346 


000167 


177554 






JMP 


INPUT 




/BEGIN THIS ROUTINE AGAIN 


1042 




















1043 








































1045 




















1046 




















1047 


004352 


005015 


040515 


047111 


MSGl: 


. ASCIK15X12>/MAINDEC 


-11-DZKAQG/ 


1048 


004360 


042504 


026503 


030461 












1049 


004366 


042055 


045532 


050501 












1050 


004374 


107 
















1051 


004375 


015 


050012 


050104 




. ASCIZ<15X12>/PDP-11 


POWER FAIL DIAGNCSTIC/<15X12> 


1052 


004402 


030455 


020061 


047520 












1053 


004410 


042527 


020122 


040506 












1054 


004416 


046111 


042040 


040511 












1055 


004424 


047107 


051517 


044524 












1056 


004432 


006503 


000012 
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1057 
1058 
1059 
1060 
1061 



004436 005015 
004444 044503 
004452 
004460 
004466 



054105 051105 

042523 020122 

047105 020104 043117 

050040 051501 006523 
000012 



-ASCIZ<15X12>/EXFRCISER END OF PASS/<15X12> 
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106? 


aa A An at 


05 015 


042524 




MSG3 . 




1063 


a<a 4 4 / D 


» x K? rj O X 


047105 


a*) CM CIJ 






1064 


ft ft A C (S A 

004:)» 4 




a c fj a a a 


051501 






1065 


ft ft A 1 1 


06523 


a a am n 

B » B B 1 / 








1066 


004516 


a aK ate 


042524 


05 21 23 


MSG4 : 


.Abli£<lt)><12>/ i hb 1 / hNU Ur r Abb / <1T/<1 I? 


1067 


ft ft A CI A 


W <£0 H O z 


047105 


020104 






1068 


004532 


431 1 7 




051501 






1069 


ft ft A C A ft 


06523 










1070 


004544 


05015 


046101 


04 2524 


MSG5 : 


* AbLli<lb><l <£>/ ALTht> 1 fcNU Ur HAbb/vlb><12> 


1 071 




0521 23 


ft A*% A A 1% 

» 424419 








1072 


004560 


fli A*1 A A ft 

W4/44B 


020106 


a vi c: *) ei 






1073 


004566 


051523 


n rt cr a i c 

00b0lD 


000 






1074 


004573 


015 


04041 2 


05 2114 


MSG6 : 


• AbLlZ<lD><l />/ ALTbTl tNU Ur "Abb/ vlbXli) 


1075 


004600 


0521 23 


020061 


047105 






1076 


f%ft ACfkd 

»04ol9b 






me an /ja 






1077 


004614 


051501 


006523 


000012 






1078 


004622 


005015 


042524 


Mb 21 2 J 


MSG7 : 


. ASCIZ<15X12>/TEST3 END OF PASS/<15X1?> 


1079 


004630 


020063 


047105 


20104 






1080 


004636 


043117 


050040 


051501 






1 081 


ft ft A £L A A 


06523 










1082 


004650 


005015 


0425 24 


052123 


MSG8 : 


*e/*T7j'1CV.^11*v/'l , C'O l T l /l CUM HP HUGO / XICVj'I'lX 

.AbCIZ<lDX12>/TtbT4 P.NU Ur l'Abb/<lr><l <; > 


1083 


004656 


020064 


047105 


020104 






1084 


004664 


043117 


050040 


051501 






1085 


004672 


006523 


000012 








1086 


004676 


005015 


053523 


036522 


HSG9 : 


-ASCIZ<15X12>/SWP = / 


1087 


004704 


000 










108R 


ft It >I*T ft C 

004 two 






042516 


HSG10 • 


ICCI7/1 C\/1 -J v / V E" V CUD-/ 


1089 


00471? 


020127 


053523 


036522 






1090 


004720 


000 










1091 




004722 








. EVEN 


1092 


004722 


0P4736 






TABLE: 


.=-+14 


1093 


004736 


000000 






US8REG: 





1094 


004740 


000000 






CNTR: 





1095 


004742 


0005*00 






TEMSWR : 





1096 


004744 


000000 






ROTATE : 





1097 


004746 


000000 






pinflg: 





1098 


004750 


000000 






LLIMIT: 





15*99 




000001 






. END 
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CROSS REFERENCE TABLE 



USER SYM«>C!.S 



ACTHQD 


00312? 


769 


813# 


ALTEST 


001406 


387 


513# 


ALTST1 


021566 


388 


55 9f 


ALTST2 


001650 


570f 


599 


ALT? 


001470 


518 


529# 


ALT2A 


001512 


533 


534« 


ALT? AX 


001530 


536 


537ff 


ALT2B 


001532 


535 


538# 


ALT2C 


001554 


539 


542# 


ALT2X 


001510 


532 


533# 


ALT3A 


001674 


564 


580S 


ALT3B 


001724 


586# 




ALT3BX 


001744 


586 


5P9# 


ALT3C 


001*746 


583 


585 


ALT3D 


001770 


590 


597# 


ALT3E 


002016 


601 


65*4# 


ALT1X 


002034 


581 


611ft 


AUTO 


003072 


800 


804# 


BR1 


003326 


830 


852# 


BR2 


003512 


869 


8878 


CKACT 


003054 


787 


794 


CMDAT 


002706 


76 8 # 


814 


CMDX 


002702 


767# 




CNTEM- 


003502 


8*3 


885# 


CNTP 


004740 


998* 


1014 


CONAC 


003164 


824# 




GONAD 


003156 


822# 




EMTRP = 


000030 


395« 


566* 


EMTUP 


003450 


877# 


886 


EMTWT 


001644 


568# 




EOP 


003024 


7P5 


793# 


EXMST 


002554 


748# 


751 


FILDAT 


002670 


764# 


766 


FLAG 


003554 


804 


891* 


HALT1 


001050 


421# 




HALT10 


001372 


503# 




HALTH 


001402 


506fl 




HALT12 


002140 


641 


643# 


HALT13 


002206 


650 


652# 


HALT1 4 


002352 


696 


698# 


HALT15 


002472 


707 


721# 


HALT16 


002474 


714 


722# 


HALT1R 


003154 


818 


81 9 # 


HALT19 


003162 


823# 




HALT2 


001062 


425# 




HALT20 


003226 


834 


836# 


HALT21 


003550 


837 


894# 


HALT22 


003306 


846 


847# 


HALT23 


003426 


872 


873# 


HALT24 


003552 


874 


895# 


HALT25 


003500 


881 


883# 


HALT3E 


001232 


464 


465# 


HALT4E 


001264 


474 


475# 


HALT5E 


001322 


488# 




HALT6E 


001332 


491# 




HALT7E 


001342 


494« 





799# 
824 



1017* 1070 1025* 1026 
367* 570* 583 581* 



1094« 
644* 645* 
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DZKAQCQRC 2 7- OCT- 77 
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CROSS SEFEREMCE TABLE 



USER SYMPDLS 



HALTS E 
HALT9E 

HLIMIf 

HLT 

INPUT 

LLIMIT 

LOG 

LOGICA 

LP ALT 

LP ALT 1 

LPTST1 

LI 1ST? 

LPTST3 

LPTST* 

LPTST5 

LRTI 

MISTER 

MAST IN 

MSG 

HSG1 

MSG 10 

MSG 2 

MSG 3 

MSG 4 

MSGS 

MSG6 

HSG7 

MSG 8 

MSG 9 

NOP 

OUTPUT 
PFH AND 



PINFLG 

PRINT 

REALS? 

RETURN 

ROTATE 

SAVE 



SAVE1 

SkVEl? 
SAVE2 
SAVE 3 
SAVE4 

SAVES 
SAVFfi 
SA¥E7 

SAVES 
3 A V E 9 
SETSWR 
S^APTl 



001352 
001362 
003562 
003556 
004126 
004750 
003116 
003102 
001422 
001602 

001126 
$02052 
§£3 2 284 
002530 
003560 
000200 
§03264 
003614 
004352 
00 4705 
004436 
004470 
004516 
004544 
004573 
004622 
004650 
004676 



004326 
090024 



004746 
003704 
0«51450 
003744 
004744 
003566 



003570 
003612 
003572 
003574 
003576 
003600 
003602 
003604 

003606 
003610 
003630 
300204 



4<?7# 

500# 

758* 

760 

966 

763 

802 

378 

516# 

5628 

411 # 

443# 

622ft 

681 # 

744# 

566 

384# 

842« 

790 

739 

965 

797 

429 

455 

522 

572 

627 

686 

962 

903# 

963 

358# 

540* 

656* 

835* 

743* 

428 

520# 

945 

974* 

463* 

665 

854* 

815* 

857* 

913ft 

914# 

915# 

916# 

917# 

570 

885 

855* 

856* 

409 

385# 



765 

905# 

998# 

767 

805 

754 

524 

574 

431 

457 

629 

688 

812 

604 

851 
92 8# 
1047# 
1040 
1057# 
1062ft 
1066# 

1070* 

1074ft 
1078ft 

10B2# 
1086* 



580* 

918# 

865 

866 

441 



768 

1S41 
10988 
812ff 

807# 



907# 



972# 
























412* 


444* 


445* 


464* 


474* 


476* 


477* 


517* 


518* 


532* 


536* 


539* 


563* 


564* 


586* 


587* 


590* 


591* 


623* 


624* 


641* 


642* 


65£* 


651* 


682* 


683* 


696* 


697* 


699* 


700* 


707* 


714* 


715* 


761* 


818* 


834* 


837* 


838* 


846* 


852* 


853* 


872* 


874* 


875* 


881* 


889* 


890* 




788* 


791* 


795* 


798* 


829 


868 


10978 












454 


521 


571 


626 


685 


738 


789 


796 


944# 


961 


964 


1039 


534 
























947 


954ft 






















979 


1096# 






















478* 


485 


531* 


538* 


542 


5R8* 


592* 


597 


6P2* 


606* 


642* 


657* 


695* 


701* 


709 


747* 


748 


749* 


750 


756* 


757* 


758 


833* 


845* 


864 


882* 


911# 




















816* 


817 


822 


912ft 


















867 


9218 























919# 
920# 
514 
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CROSS REFERENCE TABLE — USER SYMBOLS 



START 2 


000210 


386# 


426 








START3 


000224 


389# 










START4 


000230 


390# 










STATUS 


177776 


393# 


413* 


443* 


516* 


562* 


STK2A 


000214 


387# 










STR2B 


000220 


388# 










SWREG 


000176 


382ft 


430 


456 


523 


573 






941* 


944 


956 


957 


1035* 


SMRG = 


0f 0234 


396ft 


935 


937* 


941 




TABLE 


004722 


972 


977 


990 


1000 


1022 


TEMPST 


003564 


742* 


784 


792* 


892* 


908ft 


TEMSMR 


00474? 


781* 


956* 


973 


1037 


1095# 


TEST1 


001000 


385 


408# 








TEST1C 


001040 


419# 










TEST1H 


001036 


412 


415ft 


419 






TEST2 


001112 


386 


440# 








TEST2A 


001212 


445 


461ft 








TKST2R 


001234 


462 


466# 








TEST2C 


001310 


476 


485# 








TEST2D 


001266 


473 


476# 








TSST3 


002036 


389 


619ft 








TEST3R 


002112 


623 


638# 








T E S T 3 r * 


002142 


639 


644# 








TEST3C 


002242 


656 


665# 








TEST3D 


002210 


649 


653# 








TEST4 


002250 


390 


678# 








TEST45 


002324 


682 


693# 








TEST4P 


002354 


694 


699ft 








TEST4C 


002376 


699 


707ft 








TEST40 


002450 


713 


717ft 








TEST4E 


002306 


685# 


720 








TESTS 


002476 


384 


737# 








TEST5A 


003166 


761 


827# 


889 






TEST5C 


003364 


852 


864ft 








TEST5E 


003230 


832 


837f 








TTMLOP 


002162 


647# 


655 








TKB = 


177562 


776 


925# 


1003 






TKS - 


177560 


77 4 


924# 


1001 






TPB 


177566 


927# 


952* 


989* 


1006* 




TPS 


177564 


926# 


950 


987 


1004 




TREMST 


002576 


744 


752ft 








UPDATE 


003752 


410 


442 


515 


561 


621 


UPDAT1 


003760 


783 


957ft 








UPTIME 


002422 


711ft 


719 








UPX*IM 


003430 


871 


874# 








OStf» EG 


004736 


999* 


1024* 


1029* 


1031* 


1033* 


XT I ME 


003310 


844 


849# 










004752 


353# 


358 


364 


377* 


379# 






493 


496 


499 


502 


505 


» AHS. 


004752 


m 











628 
1037* 



381* 

520 



1093# 



383S 
569 



956# 



396 
753 



398ft 

755 



420 
930« 



424 
1091ft 



487 

1B92« 



ERRORS DETECTED: 



.MAIN- MACY11 30(1046) 01-NOV-77 14:00 PAGE 26 

DZKAQG-QRC 27-0CT-77 08:52 CROSS EEFEKENCE TABLE ~ USER SYM^CLS 



SEC 0025 



DZKAQG. BIN,DZK AQG.LST/CRF/SQL/NL: TOC=DZKAQG.QRC 
RUM-TIMES 1 2 .2 SECONDS 
RUN-TIME RATIO: 61/3=17.1 
CORE USED: 6K (11 PAGES) 



